| Filename | (eval 1024)[/usr/share/perl5/Lingua/Stem/AutoLoader.pm:88] |
| Statements | Executed 30 statements in 1.83ms |
| Eval Invoked At | /usr/share/perl5/Lingua/Stem/AutoLoader.pm line 88 |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 18µs | 63µs | Lingua::Stem::Sv::BEGIN@130 |
| 1 | 1 | 1 | 17µs | 42µs | Lingua::Stem::De::BEGIN@2 |
| 1 | 1 | 1 | 16µs | 49µs | Lingua::Stem::Da::BEGIN@50 |
| 1 | 1 | 1 | 14µs | 43µs | Lingua::Stem::EnBroken::BEGIN@146 |
| 1 | 1 | 1 | 12µs | 40µs | Lingua::Stem::Fr::BEGIN@34 |
| 1 | 1 | 1 | 12µs | 36µs | Lingua::Stem::Pt::BEGIN@114 |
| 1 | 1 | 1 | 11µs | 37µs | Lingua::Stem::Gl::BEGIN@66 |
| 1 | 1 | 1 | 11µs | 35µs | Lingua::Stem::En::BEGIN@18 |
| 1 | 1 | 1 | 11µs | 35µs | Lingua::Stem::It::BEGIN@82 |
| 1 | 1 | 1 | 10µs | 34µs | Lingua::Stem::No::BEGIN@98 |
| 0 | 0 | 0 | 0s | 0s | Lingua::Stem::Da::AUTOLOAD |
| 0 | 0 | 0 | 0s | 0s | Lingua::Stem::De::AUTOLOAD |
| 0 | 0 | 0 | 0s | 0s | Lingua::Stem::En::AUTOLOAD |
| 0 | 0 | 0 | 0s | 0s | Lingua::Stem::EnBroken::AUTOLOAD |
| 0 | 0 | 0 | 0s | 0s | Lingua::Stem::Fr::AUTOLOAD |
| 0 | 0 | 0 | 0s | 0s | Lingua::Stem::Gl::AUTOLOAD |
| 0 | 0 | 0 | 0s | 0s | Lingua::Stem::It::AUTOLOAD |
| 0 | 0 | 0 | 0s | 0s | Lingua::Stem::No::AUTOLOAD |
| 0 | 0 | 0 | 0s | 0s | Lingua::Stem::Pt::AUTOLOAD |
| 0 | 0 | 0 | 0s | 0s | Lingua::Stem::Sv::AUTOLOAD |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package Lingua::Stem::De; | ||||
| 2 | 3 | 180µs | 2 | 68µs | # spent 42µs (17+26) within Lingua::Stem::De::BEGIN@2 which was called:
# once (17µs+26µs) by Lingua::Stem::BEGIN@7 at line 2 # spent 42µs making 1 call to Lingua::Stem::De::BEGIN@2
# spent 26µs making 1 call to vars::import |
| 3 | sub AUTOLOAD { | ||||
| 4 | return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o); | ||||
| 5 | if (exists $_autoloaded_functions->{$AUTOLOAD}) { | ||||
| 6 | die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n"); | ||||
| 7 | } | ||||
| 8 | $_autoloaded_functions->{$AUTOLOAD} = 1; | ||||
| 9 | my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois; | ||||
| 10 | eval ("use $packagename;"); | ||||
| 11 | if ($@ ne '') { | ||||
| 12 | die ("Unable to use packagename: $@\n"); | ||||
| 13 | } | ||||
| 14 | goto &$AUTOLOAD; | ||||
| 15 | } | ||||
| 16 | |||||
| 17 | package Lingua::Stem::En; | ||||
| 18 | 3 | 225µs | 2 | 60µs | # spent 35µs (11+25) within Lingua::Stem::En::BEGIN@18 which was called:
# once (11µs+25µs) by Lingua::Stem::BEGIN@7 at line 18 # spent 35µs making 1 call to Lingua::Stem::En::BEGIN@18
# spent 24µs making 1 call to vars::import |
| 19 | sub AUTOLOAD { | ||||
| 20 | return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o); | ||||
| 21 | if (exists $_autoloaded_functions->{$AUTOLOAD}) { | ||||
| 22 | die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n"); | ||||
| 23 | } | ||||
| 24 | $_autoloaded_functions->{$AUTOLOAD} = 1; | ||||
| 25 | my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois; | ||||
| 26 | eval ("use $packagename;"); | ||||
| 27 | if ($@ ne '') { | ||||
| 28 | die ("Unable to use packagename: $@\n"); | ||||
| 29 | } | ||||
| 30 | goto &$AUTOLOAD; | ||||
| 31 | } | ||||
| 32 | |||||
| 33 | package Lingua::Stem::Fr; | ||||
| 34 | 3 | 211µs | 2 | 68µs | # spent 40µs (12+28) within Lingua::Stem::Fr::BEGIN@34 which was called:
# once (12µs+28µs) by Lingua::Stem::BEGIN@7 at line 34 # spent 40µs making 1 call to Lingua::Stem::Fr::BEGIN@34
# spent 28µs making 1 call to vars::import |
| 35 | sub AUTOLOAD { | ||||
| 36 | return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o); | ||||
| 37 | if (exists $_autoloaded_functions->{$AUTOLOAD}) { | ||||
| 38 | die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n"); | ||||
| 39 | } | ||||
| 40 | $_autoloaded_functions->{$AUTOLOAD} = 1; | ||||
| 41 | my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois; | ||||
| 42 | eval ("use $packagename;"); | ||||
| 43 | if ($@ ne '') { | ||||
| 44 | die ("Unable to use packagename: $@\n"); | ||||
| 45 | } | ||||
| 46 | goto &$AUTOLOAD; | ||||
| 47 | } | ||||
| 48 | |||||
| 49 | package Lingua::Stem::Da; | ||||
| 50 | 3 | 177µs | 2 | 83µs | # spent 49µs (16+33) within Lingua::Stem::Da::BEGIN@50 which was called:
# once (16µs+33µs) by Lingua::Stem::BEGIN@7 at line 50 # spent 49µs making 1 call to Lingua::Stem::Da::BEGIN@50
# spent 33µs making 1 call to vars::import |
| 51 | sub AUTOLOAD { | ||||
| 52 | return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o); | ||||
| 53 | if (exists $_autoloaded_functions->{$AUTOLOAD}) { | ||||
| 54 | die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n"); | ||||
| 55 | } | ||||
| 56 | $_autoloaded_functions->{$AUTOLOAD} = 1; | ||||
| 57 | my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois; | ||||
| 58 | eval ("use $packagename;"); | ||||
| 59 | if ($@ ne '') { | ||||
| 60 | die ("Unable to use packagename: $@\n"); | ||||
| 61 | } | ||||
| 62 | goto &$AUTOLOAD; | ||||
| 63 | } | ||||
| 64 | |||||
| 65 | package Lingua::Stem::Gl; | ||||
| 66 | 3 | 159µs | 2 | 62µs | # spent 37µs (11+26) within Lingua::Stem::Gl::BEGIN@66 which was called:
# once (11µs+26µs) by Lingua::Stem::BEGIN@7 at line 66 # spent 37µs making 1 call to Lingua::Stem::Gl::BEGIN@66
# spent 26µs making 1 call to vars::import |
| 67 | sub AUTOLOAD { | ||||
| 68 | return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o); | ||||
| 69 | if (exists $_autoloaded_functions->{$AUTOLOAD}) { | ||||
| 70 | die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n"); | ||||
| 71 | } | ||||
| 72 | $_autoloaded_functions->{$AUTOLOAD} = 1; | ||||
| 73 | my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois; | ||||
| 74 | eval ("use $packagename;"); | ||||
| 75 | if ($@ ne '') { | ||||
| 76 | die ("Unable to use packagename: $@\n"); | ||||
| 77 | } | ||||
| 78 | goto &$AUTOLOAD; | ||||
| 79 | } | ||||
| 80 | |||||
| 81 | package Lingua::Stem::It; | ||||
| 82 | 3 | 159µs | 2 | 59µs | # spent 35µs (11+24) within Lingua::Stem::It::BEGIN@82 which was called:
# once (11µs+24µs) by Lingua::Stem::BEGIN@7 at line 82 # spent 35µs making 1 call to Lingua::Stem::It::BEGIN@82
# spent 24µs making 1 call to vars::import |
| 83 | sub AUTOLOAD { | ||||
| 84 | return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o); | ||||
| 85 | if (exists $_autoloaded_functions->{$AUTOLOAD}) { | ||||
| 86 | die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n"); | ||||
| 87 | } | ||||
| 88 | $_autoloaded_functions->{$AUTOLOAD} = 1; | ||||
| 89 | my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois; | ||||
| 90 | eval ("use $packagename;"); | ||||
| 91 | if ($@ ne '') { | ||||
| 92 | die ("Unable to use packagename: $@\n"); | ||||
| 93 | } | ||||
| 94 | goto &$AUTOLOAD; | ||||
| 95 | } | ||||
| 96 | |||||
| 97 | package Lingua::Stem::No; | ||||
| 98 | 3 | 165µs | 2 | 58µs | # spent 34µs (10+24) within Lingua::Stem::No::BEGIN@98 which was called:
# once (10µs+24µs) by Lingua::Stem::BEGIN@7 at line 98 # spent 34µs making 1 call to Lingua::Stem::No::BEGIN@98
# spent 24µs making 1 call to vars::import |
| 99 | sub AUTOLOAD { | ||||
| 100 | return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o); | ||||
| 101 | if (exists $_autoloaded_functions->{$AUTOLOAD}) { | ||||
| 102 | die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n"); | ||||
| 103 | } | ||||
| 104 | $_autoloaded_functions->{$AUTOLOAD} = 1; | ||||
| 105 | my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois; | ||||
| 106 | eval ("use $packagename;"); | ||||
| 107 | if ($@ ne '') { | ||||
| 108 | die ("Unable to use packagename: $@\n"); | ||||
| 109 | } | ||||
| 110 | goto &$AUTOLOAD; | ||||
| 111 | } | ||||
| 112 | |||||
| 113 | package Lingua::Stem::Pt; | ||||
| 114 | 3 | 163µs | 2 | 61µs | # spent 36µs (12+24) within Lingua::Stem::Pt::BEGIN@114 which was called:
# once (12µs+24µs) by Lingua::Stem::BEGIN@7 at line 114 # spent 36µs making 1 call to Lingua::Stem::Pt::BEGIN@114
# spent 24µs making 1 call to vars::import |
| 115 | sub AUTOLOAD { | ||||
| 116 | return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o); | ||||
| 117 | if (exists $_autoloaded_functions->{$AUTOLOAD}) { | ||||
| 118 | die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n"); | ||||
| 119 | } | ||||
| 120 | $_autoloaded_functions->{$AUTOLOAD} = 1; | ||||
| 121 | my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois; | ||||
| 122 | eval ("use $packagename;"); | ||||
| 123 | if ($@ ne '') { | ||||
| 124 | die ("Unable to use packagename: $@\n"); | ||||
| 125 | } | ||||
| 126 | goto &$AUTOLOAD; | ||||
| 127 | } | ||||
| 128 | |||||
| 129 | package Lingua::Stem::Sv; | ||||
| 130 | 3 | 207µs | 2 | 109µs | # spent 63µs (18+45) within Lingua::Stem::Sv::BEGIN@130 which was called:
# once (18µs+45µs) by Lingua::Stem::BEGIN@7 at line 130 # spent 63µs making 1 call to Lingua::Stem::Sv::BEGIN@130
# spent 46µs making 1 call to vars::import |
| 131 | sub AUTOLOAD { | ||||
| 132 | return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o); | ||||
| 133 | if (exists $_autoloaded_functions->{$AUTOLOAD}) { | ||||
| 134 | die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n"); | ||||
| 135 | } | ||||
| 136 | $_autoloaded_functions->{$AUTOLOAD} = 1; | ||||
| 137 | my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois; | ||||
| 138 | eval ("use $packagename;"); | ||||
| 139 | if ($@ ne '') { | ||||
| 140 | die ("Unable to use packagename: $@\n"); | ||||
| 141 | } | ||||
| 142 | goto &$AUTOLOAD; | ||||
| 143 | } | ||||
| 144 | |||||
| 145 | package Lingua::Stem::EnBroken; | ||||
| 146 | 3 | 186µs | 2 | 72µs | # spent 43µs (14+29) within Lingua::Stem::EnBroken::BEGIN@146 which was called:
# once (14µs+29µs) by Lingua::Stem::BEGIN@7 at line 146 # spent 43µs making 1 call to Lingua::Stem::EnBroken::BEGIN@146
# spent 29µs making 1 call to vars::import |
| 147 | sub AUTOLOAD { | ||||
| 148 | return if ($AUTOLOAD =~ m/::(END|DESTROY)$/o); | ||||
| 149 | if (exists $_autoloaded_functions->{$AUTOLOAD}) { | ||||
| 150 | die("Attempted to autoload function '$AUTOLOAD' more than once - does it exist?\n"); | ||||
| 151 | } | ||||
| 152 | $_autoloaded_functions->{$AUTOLOAD} = 1; | ||||
| 153 | my ($packagename) = $AUTOLOAD =~ m/^(.*)::[A-Z_][A-Z0-9_]*$/ois; | ||||
| 154 | eval ("use $packagename;"); | ||||
| 155 | if ($@ ne '') { | ||||
| 156 | die ("Unable to use packagename: $@\n"); | ||||
| 157 | } | ||||
| 158 | goto &$AUTOLOAD; | ||||
| 159 | } | ||||
| 160 | |||||
| 161 | |||||
| 162 | ; |